home *** CD-ROM | disk | FTP | other *** search
/ Workplace Effectiveness: Critical Thinking Skills / Workplace Effectiveness: Critical Thinking Skills.iso / pc / Files / Skilluse.dxr / 00003_Navigation framework.ls < prev    next >
Encoding:
Text File  |  1998-09-15  |  1002 b   |  68 lines
  1. global gMasterData, gSection
  2.  
  3. on GoOn
  4.   case gSection of
  5.     #intro:
  6.       goReview()
  7.     #review:
  8.       nextReview()
  9.     #score:
  10.       goVideo()
  11.     #answers:
  12.       nextAnswer()
  13.     #plan1:
  14.       goPlan2()
  15.     #plan2:
  16.       goNarrator(gMasterData, "102")
  17.       goScore()
  18.     #video:
  19.       leaveThisMovie()
  20.     #evaluate1:
  21.       go("eval2")
  22.       set gSection to #evaluate2
  23.     #evaluate2:
  24.       goVideo()
  25.   end case
  26. end
  27.  
  28. on goBack
  29.   case gSection of
  30.     #review:
  31.       prevReview()
  32.     #score:
  33.       goReview()
  34.     #answers:
  35.       prevAnswer()
  36.     #plan1:
  37.       goNarrator(gMasterData, "102")
  38.       goScore()
  39.     #plan2:
  40.       goPlan1()
  41.     #video:
  42.       goScore()
  43.     #evaluate1:
  44.       goVideo()
  45.     #evaluate2:
  46.       go("eval1")
  47.       set gSection to #evaluate1
  48.   end case
  49. end
  50.  
  51. on leaveThisMovie
  52.   if iAmActivated(gMasterData) then
  53.     getPrintData()
  54.   end if
  55.   stopSound2()
  56.   cursor(4)
  57.   go(1, "Main")
  58. end
  59.  
  60. on notePadButton
  61.   DoNotepad()
  62. end
  63.  
  64. on continueNext
  65.   stopSound2()
  66.   go(the frame + 1)
  67. end
  68.